home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-users-of-norman / CUON_14_(11-1984).d64 / 64 searcher (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  774b  |  17 lines
  1. 20 REM 64 SEARCHER
  2. 22 REM FROM COMPUT'S GAZETTE
  3. 24 REM TYPED BY GLEN HOSKINS
  4. 40 T=49152:FORI=TTOT+150:READA:POKEI,A:CS=CS+A:NEXTI
  5. 50 IFCS<>20528THENPRINT"ERROR IN DATA STATEMENTS":STOP
  6. 60 PRINT"[147]SYS";T;"TO START":END
  7. 100 DATA160,0,177,43,133,251,200,177,43,133,252,160,0,177,251,208
  8. 110 DATA1,200,177,251,208,1,96,160,0,177,251,141,52,3,200,177
  9. 120 DATA251,141,53,3,200,177,251,133,99,200,177,251,133,98,200,24
  10. 130 DATA165,43,105,5,133,67,166,44,144,1,232,134,68,177,251,240
  11. 140 DATA55,162,0,193,67,240,4,200,24,144,242,192,0,240,10,136
  12. 150 DATA230,251,208,2,230,252,24,144,242,160,0,177,67,240,8,209
  13. 160 DATA251,208,218,200,24,144,244,169,35,32,210,255,166,99,165,98
  14. 170 DATA32,205,189,169,32,32,210,255,173,52,3,133,251,173,53,3
  15. 180 DATA133,252,24,144,134
  16. 190 DATA173,230,159,141,19,3,173,231,159,141,19,3,169,128,32,144,255,0
  17.